home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / WEBSITES / APDL / LOCUS.ZIP / !Locus / !Run < prev    next >
Text File  |  1997-01-17  |  1KB  |  29 lines
  1. | !Run Obey file for Locus Application
  2. Set Locus$Dir <Obey$Dir>
  3. Set LocusDat$Dir <Locus$Dir>.Resources.Data
  4. Set LocusMod$Dir <Locus$Dir>.Resources.Modules
  5. Set Locus$BasicFile <Obey$Dir>.!Locus
  6. Set Loc$File ""
  7. Set File$Type_dfe CSV
  8. Set File$Type_c7d SID
  9. Set File$Type_142 LocFile
  10. If "%0"<>"" then Set Loc$File %0
  11. Set Alias$@RunType_142 Run <Locus$Dir>.!Run %%*0
  12. IconSprites <Obey$Dir>.!Sprites
  13. Set Dummy$Path <Run$Path>,<Obey$Dir>.Resources.
  14. Run Dummy:ResFind Locus
  15. Unset Dummy$Path
  16. WimpSlot -min 720K -max 720K
  17. |Load any modules required now
  18. RMEnsure MenuUtils 0.11 RMLoad <LocusMod$Dir>.MenuUtils
  19. RMEnsure MenuUtils 0.11 Error 0 Error Couldn't load MenuUtils Module
  20. RMEnsure MessageTrans 0.06 RMLoad <LocusMod$Dir>.MsgTrans
  21. RMEnsure MessageTrans 0.06 Error Couldn't load MsgTrans Module
  22. RMEnsure DrawFile 1.01 RMLoad <LocusMod$Dir>.DrawFile
  23. RMEnsure DrawFile 1.01 Error Couldn't load DrawFile Module
  24. RMEnsure FontMenu 1.16 RMLoad <LocusMod$Dir>.FontMenu
  25. RMEnsure FontMenu 1.16 Error Couldn't load FontMenu Module
  26. |And check that there is still enough memory!
  27. WimpSlot -min 720K -max 720K
  28. Run <Locus$Dir>.!Locus %*0
  29.